(xml-mode): New alias for `sgml-mode'.

diff --git a/lisp/textmodes/sgml-mode.el b/lisp/textmodes/sgml-mode.el
index a9e13c7c4918d967eb2bafa52e7da06fd57f982a..28eea74f9f3d21f6f115b38a2c1aaeb8ea4e39f5 100644 (file)
--- a/lisp/textmodes/sgml-mode.el
+++ b/lisp/textmodes/sgml-mode.el
@@ -446,6 +446,10 @@ Do \\[describe-key] on the following bindings to discover what they do.
        (concat "<!\\(element\\|entity\\)[ \t\n]+%?[ \t\n]*\\("
               sgml-name-re "\\)")))
 
+;; Some programs (such as Glade 2) generate XML which has
+;; -*- mode: xml -*-.
+(defalias 'xml-mode 'sgml-mode)
+
 (defun sgml-comment-indent ()
   (if (looking-at "--") comment-column 0))